(open-tls-stream): Properly handle case where there is no associated

buffer.

diff --git a/lisp/net/tls.el b/lisp/net/tls.el
index 9de74ca19d47e9e4f92bd1a6074d542795068061..ee093571decc3103ded7b179a539d0e452fd048b 100644 (file)
--- a/lisp/net/tls.el
+++ b/lisp/net/tls.el
@@ -142,6 +142,7 @@ Fourth arg PORT is an integer specifying a port to connect to."
             response)
        (while (and process
                    (memq (process-status process) '(open run))
+                   buffer
                    (save-excursion
                      (set-buffer buffer) ;; XXX "blue moon" nntp.el bug
                      (goto-char (point-min))